Fix last fix.

diff --git a/lisp/dired.el b/lisp/dired.el
index 5b460d92287ef48c7460344a7323455d21dbbb0a..3d6e6d9ea26c3b59ffb90208cc5a4062e0c813f3 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -3311,7 +3311,9 @@ Ask means pop up a menu for the user to select one of copy, move or link."
                        (rename-file to backup-file 0)
                        (dired-relist-entry backup-file))
                      (dired-copy-file from to overwrite)))
-                  (t (dired-copy-file from to nil)))
+                  (t 
+                   (let (dired-overwrite-confirmed)
+                     (dired-copy-file from to nil))))
             (dired-relist-entry to)
             action)
            ((eq action 'move)